PPPPPPPPPPPP 
PPPPPPPPPPPP 
PPPPPPPPPPPP 
PPP PPP 
PPP PPP 
PPP PPP 


PPP PPP 
PPP PPP 


PPP PPP 
PPPPPPPPPPPP 
PPPPPPPPPPPP 
PPPPPPPPPPPP 


tt tt ot st tt Ht 4 St St Ht Ht Ht SH Ht 

AAAs tH HS HH 

A a A A A tH tt 
AAAAAAOOOAAMAAOO 
AAQMAAAAOAOAMAAAOAO 
NOAAMAAAAAAAAAOOO 


HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHHHHHHHHHHHHHH 
HHHHHHHHHHHHHHH 
HHHHHHHHHHHHHHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 


| 
ed 


**F ]LE®e]DeeVXSMAC DY! 
vO. 
} P 
: 
; 
| ; 
VV VV XX XX SSSSSSSS MM MM AAAAAA cccccccc : 
VV VV XxX XX SSSSSSSS MM MM AAAAASA Cccccccc : 
VV VV XX XxX SS MMMM MMMM AA AA CC F 
VV VV xX xx SS MMMM MMMM AA AA CC $ 
VV VV XX XK SS MM MM AA AA CC PY 
vw VV XX Xx SS MM M AA AA CC F 
VV VV XX SSSSSS MM MM AA AA CC é 
VV VV XX SSSSSS MM MM AA AA CC : 
VV VV XX = XX SS MM MM AAAAAAAAAA CC ; 
VV VV XX XX SS MM MM AAAAAAAAAA CC ; 
VW VV XX XX SS MM MM AA AA CC ine | F 
VW OV XX XX SS MM MM AA AA CC éene : 
VV XX XX SSSSSSSS MM MM AA AA cCCCCCCC cea : 
VV XX XX SSSSSSSS MM MM AA AA cccccccc aie ; 
| . 
| 
RRRRRRRR EEEEEEEEEE QQ0000 : 
RRRRRRRR EEEEEEEEEE QQ00Q0Q : 
RR RR EE QQ QQ : 
RR RR EE QQ QQ é 
RR RR EE QQ QQ i 
RR RR EE QQ QQ : 
RRRRRRRR EEEEEEEE QQ QQ : 
RRRRRRRR EfEEEEEE QQ QQ - 
RR RR EE QQ QQ Qa 
RR RR EE QQ QQ Qa 
RR RR EE QQ QQ 
RR RR EE QQ QQ 
RR RR EEEEEEEEEE QQQQ QQ 
RR RR EEEEEEEEEE QQQQ Qa 


Be ee 
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VXSMAC.BEG = WIDELY USED STANDARD MACROS 

; Version: *v04-000' 

RITTTLITITILILI LLL LILLIE LLL LiL Titi tT TTT ttt 

'‘® COPYRIGHT (c) 1978, 1980, 1982, 1984 B 

't DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. 

't ALL RIGHTS RESERVED. 


't THIS fe “heche se Lat alte ace A b tCEmse SND MAY BE USED AND COPIED 


® 
® 
* 
® 
® 
t 
n 
* 
* 
' * 
:* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
'* TRANSFERRED. ® 
' ® 
!* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
!t AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
't CORPORATION. * 

* 

® 

+ 

® 

a 

* 


!® DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
!® SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


VRE ERE EERE EERE AREER EEE 
i 


i Revision mepeenys 
i 02 01-07-77 


cP Add CHSSEQUENCE. 
03 12-08-77 cP Add CONSECUTIVE (from PARLIT.BEG). 
MACRO 
TRUE =1%, ! BOOLEAN TRUE 
FALSE =0%, ! BOOLEAN FALSE 
REPEAT = WHILE 1 DOZ, 


i i PEROCOR ZEROES AN AREA OF CORE. THE TWO PARAMETERS ARE 
: ADDRESS’ AND “COUNT, WHICH ARE THE ADDRESS OF THE AREA TO 

i BE ZEROED AND THE NUMBER OF CONTIGUOUS LONGWORDS TO BE ZEROED, 
iR RESPECTIVELY 


ZEROCOR eerie COUNT) = 
CHSFILL (0, (COUNT) * 4, CHSPTR (ADDRESS))%, 


ONEOF (X) [Jj = 
(MASK (ZREMAINING)) * (X) LSS 0%, 


OR_OP (Xx) f = 
ORZ, 


MASK (X) 2 = 
* (31-X) OR_OP (ZREMAINING) MASK (ZREMAINING)2, 


1 
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ch$sequence (n) = 
VECTOR Cch$allocation (n)J]%, 


CONSECUTIVE CXJ = LITERAL X = %COUNTS; 


VXSMAC.BEG == LAST LINE 


Dee Oe Oe FHS Oe Be Be OHO Be Be Se Be SESH Se Se SESH SH Sse Be Se Se Se SHS SH Se Se oe SESH Se SESH Se Se SH Se SH SH arene SHS SH SH SHS Se Se SH Se ae 
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IGI 
ONF 


0299 Gax7uns va 0 ae 


